;;йֿ-ָɾ
[@ָ]
{
#IF
#ACT
   mov    A0      %ARG(1)
   mov    D1      %ARG(2)
   mov    S1     2
#SAY
ĿǰĻֵΪ {FCOLOR/10}<$USERJF>{FCOLOR/12} .\
Իָɾ.\
ָһҪ10.
ҪָҪָ.\
\
<[뱻ɾ]/@@shuru>\
<[һҳ]/@youxijifen>\
<[ر]/@exit>

[@@shuru]
#ACT
mov  A4  %INPUTSTR

#IF
#ACT
   FormatStr "FLD_CHARACTER='%s'" %A4
   ReadValueSql  "TBL_CHARACTER"  %A9  "FLD_CHARACTER,FLD_DELETED"  [@shanchu]

[@shanchu()]
#ACT
   mov    A1      %ARG(1)
   mov    A2      %ARG(2)
   goto @quedingmzi

[@quedingmzi]
#IF
   equal  A1 ""
#SAY
޴ˣȷ.\\
< /@ָ>\
< /@exit>\
#IF
   equal  A1 %A4
   equal  A2 "0"

#SAY
 {FCOLOR/10}<$OUTPUT(A4)>{FCOLOR/12} ûɾ.\\
< /@ָ>\
< /@exit>\
#IF
   equal  A1 %A4
   equal  A2 "1"
#SAY
ĿǰĻֵΪ {FCOLOR/10}<$USERJF>{FCOLOR/12} .\
 {FCOLOR/10}<$OUTPUT(A4)>{FCOLOR/12} ɾˣȷҪָ\\
<ָ/@hueifurw>\
< /@exit>\

[@hueifurw]
#SAY
ĿǰĻֵΪ {FCOLOR/10}<$USERJF>{FCOLOR/12} .\
һIDܴ4.ȷпλ?\
<ȷ/@hueifurenwu>\

[@hueifurenwu]
#IF
checkcmd CHECKUSERJF 9
#ACT
actcmd SETUSERJF - 10 ָ
goto @hueifurenwu+

#ELSESAY
Ļֲ.޷ִлָĹ.\
<λû/@helpjf1+>\
< /@exit>\

[@helpjf1+]
#SAY
#CALL [JifenSystem\ְ˵.txt] @JifenExplanation


[@hueifurenwu+]
#IF
#ACT
   FormatStr "FLD_CHARACTER='%s'" %A4
   mov   A8     %A9
   mov   A3      0
   FormatStr "FLD_DELETED='%s'" %A3
   UPDATEVALUESQL "TBL_CHARACTER" %A8 %A9
#SAY
 {FCOLOR/1}<$OUTPUT(A4)>{FCOLOR/12} ɹָ.\\
ĿǰĻֵΪ {FCOLOR/10}<$USERJF>{FCOLOR/12} .\
< /@EXIT>\


}
;;Ҫɾ

